home *** CD-ROM | disk | FTP | other *** search
/ The Very Best of Atari Inside / The Very Best of Atari Inside 1.iso / sharew / elektro / lsim_21 / spenb.lsm < prev    next >
Encoding:
Text File  |  1989-04-23  |  1.5 KB  |  64 lines
  1.  
  2.  
  3.  
  4. {    ------------------------------------------------------------------
  5.  
  6.      This file is a translation of diagram on page 68 of the 1979 E. P.
  7. Dutton paperback edition of G. Spencer-Brown's "The Laws of Form".
  8.  
  9.  
  10.  
  11.   0  indicates the unmarked state
  12.  
  13.   1  indicates the marked state
  14.  
  15.     eg:     -----|
  16.              a b |  translates to  /(a + b)
  17.  
  18.             if a and b are leads entering a marker the value indicated
  19.             by the marker is also /(a + b)
  20.  
  21.   u represents the wave structure at the marker at the top left, 
  22.   v represents the wave structure at the next leftmost marker, and
  23.   w represents the wave structure at the rightmost unlabelled marker
  24.  
  25.   other letters are as used in "The Laws of Form".
  26.  
  27.  
  28.  
  29.      Since this system has no reset you will have to use the cheat feature
  30. (hold the control key down whilst pressing 1 or 0) to get it out of a
  31. totally undetermined state. If you set the signals as follows you will enter
  32. a determined state.
  33.  
  34.      Signal    Set to
  35.      ======    ======
  36.  
  37.           v    0
  38.           w    0
  39.           d    1
  40.           c    0
  41.           u    0
  42.           i    0
  43.           a    1
  44.  
  45.           p    Leave unset
  46.  
  47.  
  48.  
  49.      ------------------------------------------------------------------ }
  50.  
  51.  
  52.  
  53. ! v, w, d, c, u, i, a = 1, p;
  54.  
  55. v = /( a + u + w );
  56. w = /( a + v + d );
  57. d = /( v + w + c );
  58. c = /( w + d + i );
  59. i = /( c + v + d );
  60. u = /( v + w + d );
  61.  
  62. p = c;  { p: the output is the state of marker c }
  63.  
  64.